home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / wpr____2.p2s < prev    next >
Encoding:
Text File  |  1994-04-27  |  1.5 KB  |  66 lines

  1. ######################################################################
  2. #                                                                    #
  3. #  Cueing test                                                       #
  4. #                                                                    #
  5. ######################################################################
  6.  
  7. open waveaudio00 alias wave notify
  8. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #1
  9. @WAIT_NOTIFY 1 30000
  10.  
  11. cue wave input wait
  12. =!ERROR
  13.  
  14. cue wave output wait
  15. =!ERROR
  16.  
  17. cue wave wait
  18. =!ERROR
  19.  
  20. setcuepoint wave on at 3000 wait
  21. =!ERROR
  22.  
  23. setpositionadvise wave on every 1200 wait
  24. =!ERROR
  25.  
  26. load wave ?AP2PATH?A8B22K.WAV notify
  27. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_LOAD
  28.  
  29. cue wave notify
  30. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #2
  31. @WAIT_NOTIFY 2 30000
  32.  
  33. play wave notify
  34. +MM_MCINOTIFY MCI_NOTIFY_ABORTED MCI_PLAY #3
  35.  
  36. pause wave wait
  37. status wave mode wait
  38. =paused
  39.  
  40. cue wave output notify
  41. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #4
  42. @WAIT_NOTIFY 4 30000
  43. status wave mode wait
  44. =stopped
  45.  
  46. cue wave output notify
  47. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #5
  48. @WAIT_NOTIFY 5 30000
  49. @WAIT_NOTIFY 3 30000
  50.  
  51. seek wave to 0 wait
  52. status wave position wait
  53. =0
  54.  
  55. play wave notify
  56. +MM_MCINOTIFY MCI_NOTIFY_ABORTED MCI_PLAY #6
  57.  
  58. cue wave output notify
  59. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #7
  60. @WAIT_NOTIFY 7 30000
  61. @WAIT_NOTIFY 6 30000
  62.  
  63. close wave notify
  64. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #8
  65. @WAIT_NOTIFY 8 30000
  66.